home *** CD-ROM | disk | FTP | other *** search
- on exitFrame
- global gCurrentMainMenuRollOver
- if voidp(gCurrentMainMenuRollOver) then
- set gCurrentMainMenuRollOver to EMPTY
- end if
- set s to "Main Menu Loop"
- if rollOver(5) then
- set s to "Coaches RollOver"
- else
- if rollOver(6) then
- set s to "Players RollOver"
- else
- if rollOver(7) then
- set s to "Teams RollOver"
- else
- if rollOver(16) then
- set s to "Help Rollover"
- else
- if rollOver(46) then
- set s to "Quit"
- end if
- end if
- end if
- end if
- end if
- if gCurrentMainMenuRollOver <> s then
- set gCurrentMainMenuRollOver to s
- go(s)
- end if
- if s = "Main Menu Loop" then
- go("HBTD")
- end if
- end
-